#
# Arguments to gensup1.sh:
# 1:name 2:base_material 3:top_material
#

genworm $2 {$1}a "0" "0.1+1.5*t" "1-.5*sin(2.9*(t))" "0.10-0.04*t" 12 | xform -ry 0
genworm $2 {$1}a "0" "0.1+1.5*t" "1-.5*sin(2.9*(t))" "0.10-0.04*t" 12 | xform -ry 120
genworm $2 {$1}a "0" "0.1+1.5*t" "1-.5*sin(2.9*(t))" "0.10-0.04*t" 12 | xform -ry 240

#genrev $2 {$1}t "-0.07 * cos(2*PI*t)" "0.5 - 0.07*sin(2*PI*t)" 30 | xform -rx 90 -t 0 0.95 0

genworm $2 {$1}t "0.35*cos(2*PI*t)+0.15*sin(4*PI*(t+0.25))" "0" "0.35*sin(2*PI*t)+0.15*cos(4*PI*(t+0.25))" "0.07" 36 | xform -t 0 0.95 0

echo $3 sphere {$1}ball
echo 0
echo 0
echo 4 0 2.64 0 1.3

